home *** CD-ROM | disk | FTP | other *** search
/ .net (French) 1997 February / .net Magazine (FR) - Issue 04 - Feb 1997.iso / pc / partners / havas / win31 / isp.scp < prev    next >
Text File  |  1996-10-15  |  590b  |  34 lines
  1. ;
  2. ; Script de connection a HOL
  3. ; via le kiosque micro 36 01 13 13
  4. ;
  5.  
  6.  
  7. ; Main entry point to script
  8. ;
  9. proc main
  10.  
  11.    ; Delay for 2 seconds first to make sure the
  12.    ; host doesn't get confused when we send the
  13.    ; two carriage-returns.
  14.    ;set port databits 8
  15.    ;set port stopbits 1
  16.    ;set port parity none
  17.    
  18.    transmit "^M^M"
  19.  
  20.    ; Wait for the login prompt before entering
  21.    ; the user ID
  22.    waitfor "Ser?"
  23.    transmit "hol^M"
  24.    waitfor "name:"
  25.    transmit $USERID
  26.    transmit "^M"
  27.  
  28.    waitfor "word:"
  29.    transmit $PASSWORD
  30.    transmit "^M"
  31.  
  32.  
  33. endproc
  34.